home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Reference / DevCon / Orlando_1993 / Devcon93.4 / CAMD / examples / newexamples / camdlist.c next >
Encoding:
C/C++ Source or Header  |  1992-08-31  |  1.4 KB  |  63 lines
  1. #include <clib/alib_protos.h>
  2. #include <clib/alib_stdio_protos.h>
  3. #include <clib/cia_protos.h>
  4. #include <clib/dos_protos.h>
  5. #include <clib/exec_protos.h>
  6. #include <clib/misc_protos.h>
  7. #include <clib/timer_protos.h>
  8. #include <clib/utility_protos.h>
  9.  
  10. #include <stdlib.h>
  11.  
  12. #include "/midi/camd.h"
  13. #include "/midi/camdtime.h"
  14. #include "/midi/mididefs.h"
  15. #include "/clib/camd_protos.h"
  16. #include "/pragmas/camd_lat_pragmas.h"
  17.  
  18. struct Library    *CamdBase;
  19.  
  20.     /* stub functions */
  21.  
  22. struct MidiNode *CreateMidi(Tag tag, ...)
  23. {    return CreateMidiA((struct TagItem *)&tag );
  24. }
  25.  
  26. BOOL SetMidiAttrs(struct MidiNode *mi, Tag tag, ...)
  27. {    return SetMidiAttrsA(mi, (struct TagItem *)&tag );
  28. }
  29.  
  30. struct MidiLink *AddMidiLink(struct MidiNode *mi, LONG type, Tag tag, ...)
  31. {    return AddMidiLinkA(mi, type, (struct TagItem *)&tag );
  32. }
  33.  
  34. BOOL SetMidiLinkAttrs(struct MidiLink *mi, Tag tag, ...)
  35. {    return SetMidiLinkAttrsA(mi, (struct TagItem *)&tag );
  36. }
  37.  
  38. void main(int argc, char *argv[])
  39. {    struct MidiCluster    *mc = NULL;
  40.     struct Conductor    *cdt = NULL;
  41.  
  42.     if (CamdBase = OpenLibrary("camd.library",0L))
  43.     {
  44.         LockCAMD(CD_Linkages);
  45.         while (mc = NextCluster(mc))
  46.         {
  47.             printf("Cluster \"%s\"\n",mc->mcl_Node.ln_Name);
  48.         }
  49.         UnlockCAMD(CD_Linkages);
  50.  
  51.         LockCAMD(CD_Conductors);
  52.         while (cdt = NextConductor(cdt))
  53.         {
  54.             printf("Conductor \"%s\"\n",cdt->cdt_Node.ln_Name);
  55.         }
  56.         UnlockCAMD(CD_Conductors);
  57.  
  58.         CloseLibrary(CamdBase);
  59.     }
  60.  
  61.     exit(0);
  62. }
  63.